﻿Module Module1

    Sub Main()

        Dim nombre, apellidos, direccion, telefono As String
        Console.Write("Indique por favor su nombre: ")
        nombre = Console.ReadLine()

        Console.Write("Indique por favor sus dos apellidos separados por un espacio: ")
        apellidos = Console.ReadLine()

        Console.Write("Indique por favor su dirección: ")
        direccion = Console.ReadLine()

        Console.Write("Indique por favor su teléfono: ")
        telefono = Console.ReadLine()
        Console.WriteLine(" ")
        Console.WriteLine("Los datos que ha introducido son: ")
        Console.WriteLine("Nombre: " & nombre)
        Console.WriteLine("Apellidos: " & apellidos)
        Console.WriteLine("Dirección: " & direccion)
        Console.WriteLine("Teléfono: " & telefono)
        Console.ReadLine()
    End Sub

End Module
